# install.packages("bupaR")
library(bupaR)
##
## Attaching package: 'bupaR'
## The following object is masked from 'package:stats':
##
## filter
## The following object is masked from 'package:utils':
##
## timestamp
source("./process-mining-dashboard/demo-data-preparation.R", local = TRUE)
timeline %>% idle_time("resource", units="days")
## # A tibble: 3 × 2
## channel idle_time
## <fct> <dbl>
## 1 showpad 6.41
## 2 email 2.52
## 3 conversation 0.355
timeline %>% idle_time("resource", units="days") %>% plot()
## time spent on documents
timeline %>%
processing_time("activity") %>%
plot
## channels
timeline %>%
resource_involvement(level = "resource") %>% plot
timeline %>% activity_presence() %>% plot()
## process map
timeline %>%
process_map()
timeline %>%
process_map(type = frequency("relative"))
sub <- timeline %>% filter_trace_frequency(percentage=0.6)
sub %>%
process_map()
timeline %>%
process_map(performance(median, "days"))
timeline %>% trace_explorer(coverage=0.5)
## Warning: `rename_()` was deprecated in dplyr 0.7.0.
## Please use `rename()` instead.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was generated.
## documents/events precedence matrix
timeline %>% precedence_matrix() %>% plot
## channel matrix
timeline %>% resource_matrix() %>% plot
timeline %>% dotted_chart()
## Warning: The `add` argument of `group_by()` is deprecated as of dplyr 1.0.0.
## Please use the `.add` argument instead.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was generated.
## Joining, by = "customer"
## Warning: It is deprecated to specify `guide = FALSE` to remove a guide. Please
## use `guide = "none"` instead.
timeline %>% resource_map()